/*
    定义日志格式化类，对输入的LogMsg进行格式化输出
    具体格式控制：
        %d ⽇期
        %T 缩进
        %t 线程id
        %p ⽇志级别
        %c ⽇志器名称
        %f ⽂件名
        %l ⾏号
        %m ⽇志消息
        %n 换⾏
*/
#pragma once
#include "message.hpp"
#include <utility>
#include <sstream>
#include <cassert>
#include <vector>

namespace XKL
{
    // 抽象格式化子项基类
    class FormatItem
    {
    public:
        using ptr = std::shared_ptr<FormatItem>;
        virtual void format(std::ostream &out, LogMsg msg) = 0;
    };
    // 具体格式化子项子类
    // 时间
    class TimeFormatItem : public FormatItem
    {
    public:
        TimeFormatItem(const std::string &fmt = "%H:%M:%S")
            : _time_format(fmt)
        {
        }
        void format(std::ostream &out, LogMsg msg) override
        {
            struct tm tmp;
            localtime_r(&msg._ctime, &tmp);

            char timeStr[32];
            strftime(timeStr, 31, _time_format.c_str(), &tmp);
            out << timeStr;
        }

    private:
        std::string _time_format;
    };
    // 线程id
    class ThreadFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, LogMsg msg) override
        {
            out << msg._tid;
        }
    };
    // 日志级别
    class LevelFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, LogMsg msg) override
        {
            out << LogLevel::ToString(msg._level);
        }
    };
    // 日志器名称
    class LoggerFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, LogMsg msg) override
        {
            out << msg._logger;
        }
    };
    // 文件名
    class FileFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, LogMsg msg) override
        {
            out << msg._filename;
        }
    };
    // 行号
    class LineFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, LogMsg msg) override
        {
            out << msg._line;
        }
    };
    // 日志消息
    class MsgFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, LogMsg msg) override
        {
            out << msg._payload;
        }
    };
    // 换行
    class NLineFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, LogMsg msg) override
        {
            out << "\n";
        }
    };
    // 缩进
    class TabFormatItem : public FormatItem
    {
    public:
        void format(std::ostream &out, LogMsg msg) override
        {
            out << "\t";
        }
    };
    // 其他
    class OtherFormatItem : public FormatItem
    {
    public:
        OtherFormatItem(const std::string &str)
            : _str(str)
        {
        }

        void format(std::ostream &out, LogMsg msg) override
        {
            out << _str;
        }

    private:
        std::string _str;
    };
    // 日志格式化类
    class Formatter
    {
    public:
        using ptr = std::shared_ptr<Formatter>;
        Formatter(const std::string &pattern = "[%d{%H:%M:%S}][%t][%c][%f:%l][%p]%T%m%n")
            : _pattern(pattern)
        {
            assert(PausePattern()); // 解析必须是正确的，否则无法进行
        }
        // 将消息按序输入到IO流中 思考一下这样处理的好处？？
        void format(std::ostream &out, LogMsg &msg)
        {
            for (auto &item : _items)
                item->format(out, msg);
        }
        // 从IO流中接收数据，并返回整合好的字符串
        std::string format(LogMsg &msg)
        {
            std::stringstream ss;
            format(ss, msg);

            return ss.str();
        }
    private:
        // 对格式化规则字符串进行解析
        bool PausePattern()
        {
            // [%d{%H:%M:%S}]%T%m%n
            size_t n = _pattern.size();
            std::vector<std::pair<std::string, std::string>> fmt_orders;
            size_t pos = 0;
            std::string key, val;

            while(pos < n)
            {
                // 1. 原始字符串的检查
                if(_pattern[pos] != '%')
                {
                    val.push_back(_pattern[pos++]);
                    continue;
                }
                // "%%"判断
                if(pos + 1 < n && _pattern[pos + 1] == '%')
                {
                    val.push_back('%');
                    pos += 2; continue;
                }
                // 无对应键值(其他符号)
                if(!val.empty())
                {
                    fmt_orders.push_back(std::make_pair("", val));
                    val.clear();
                }
                // 走到这里的话，必定表示pos位置是%
                // 2. 格式化字符
                pos += 1; // 指向的就是格式化字符
                if(pos < n && isalpha(_pattern[pos]))
                {
                    key = _pattern[pos];
                }
                else
                {
                    std::cout << "pos位置: " << pos << ", %后缺失格式化字符, 格式错误!" << std::endl;
                    return false;
                }
                pos += 1; 
                // 判断是否存在字符串的子格式
                if(pos < n && _pattern[pos] == '{')
                {
                    pos += 1;
                    while(pos < n && _pattern[pos] != '}')
                    {
                        val.push_back(_pattern[pos++]);
                    }

                    if(pos == n)
                    {
                        std::cout << "{ 后无 }, 格式错误!" << std::endl;
                        return false;
                    }
                    pos += 1;
                }
                fmt_orders.push_back(std::make_pair(key, val));
                key.clear(); val.clear();
            }

            // 3. 格式子项事例化
            for(auto& item: fmt_orders)
            {
                _items.push_back(CreateItem(item.first, item.second));
            }

            return true;
        }

        FormatItem::ptr CreateItem(const std::string &key, const std::string &val)
        {
            if (key == "d")
                return std::make_shared<TimeFormatItem>(val);
            if (key == "t")
                return std::make_shared<ThreadFormatItem>();
            if (key == "c")
                return std::make_shared<LoggerFormatItem>();
            if (key == "f")
                return std::make_shared<FileFormatItem>();
            if (key == "l")
                return std::make_shared<LineFormatItem>();
            if (key == "p")
                return std::make_shared<LevelFormatItem>();
            if (key == "T")
                return std::make_shared<TabFormatItem>();
            if (key == "m")
                return std::make_shared<MsgFormatItem>();
            if (key == "n")
                return std::make_shared<NLineFormatItem>();
            if (!key.empty())
            {
                std::cout << "%" << key << ", 未收录的格式化字符!" << std::endl;
                abort();
            }
            return std::make_shared<OtherFormatItem>(val);
        }

    private:
        std::string _pattern; // 格式化规则字符串
        std::vector<FormatItem::ptr> _items;
    };
}